home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
426-450
/
disk_436
/
aztecarp
/
source.lzh
/
Glue
/
Toupper.asm
< prev
next >
Wrap
Assembly Source File
|
1990-12-05
|
189b
|
19 lines
section text,code
xref _ArpBase
xdef _Toupper
_Toupper:
pea (a6)
move.l _ArpBase,a6
IF INT16
move.w 8(sp),d0
ELSE
move.l 8(sp),d0
ENDC
jsr -534(a6)
move.l (sp)+,a6
rts
end